home *** CD-ROM | disk | FTP | other *** search
/ Clickx 75 / Clickx 75.iso / software / expressionweb / expressionwebv3 / ExpressionWeb_en.exe / Setup / WeConen.cab / xweb.vtidb.wiz.LOGINVAL.HTX.en < prev    next >
Encoding:
Text File  |  2009-06-09  |  631 b   |  27 lines
  1.  
  2. <!--#include file="<%LoginIncPage%>"-->
  3.  
  4.  
  5. <%BeginASP%>
  6. ' if any of the variables do not match, create error message
  7. if Request.Form("login") <> Username or Request.Form("password") <> Password then
  8.        MsgErr = "<h3><%AuthorizationFailed%></h3>" & "<br>" & "<a href=<%LoginASPPage%>><%TryAgain%></a>"
  9.        Response.Write MsgErr
  10.  
  11. ' if correct, set the session variable and proceed
  12. Else
  13.     Session(SiteId) = true
  14.  
  15.  
  16. ' redirect
  17. If Len(Request("requester")) > 0 Then
  18.     Response.Redirect (Request("requester"))
  19. Else
  20.        Response.Redirect "<%HomeASPPage%>"
  21. End if
  22.  
  23. End if
  24. <%EndASP%>
  25.  
  26. <body bgcolor="#FFFFFF">
  27.